home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1997 February / EnigmA AMIGA RUN 15 (1997)(G.R. Edizioni)(IT)[!][issue 1997-02][PLANET CD V].iso / progs / editor / frexxed / fpl / scrollall.fpl < prev    next >
Text File  |  1995-07-18  |  448b  |  16 lines
  1. export int ScrollAll(int direction)
  2. {
  3.   int inputid=GetEntryID();        // Current entry
  4.   int view_count=ReadInfo("views");
  5.  
  6.   while (view_count--) {
  7.     CurrentBuffer(NextView());        // Make next view the current buffer
  8.     ScrollDown(direction);        // Scroll
  9.     Status();                // Update the status line
  10.   }
  11.   CurrentBuffer(inputid);        // Restore the initial entry
  12. }
  13.  
  14. AssignKey("ScrollAll(-1);", "Shift '0x3E'");
  15. AssignKey("ScrollAll(1);", "Shift '0x1E'");
  16.